10 PRINT "[147]"
20 FOR I=0 TO 7
30 GT=0
40 POKE 16384,I
50 FOR J=0 TO 19
60 POKE 24576,0
70 GT=GT+PEEK(40960)
80 NEXT J
90 RESULT=127-(GT/20)
100 PRINT INT((INT(RESULT*100))/100)
110 NEXT I
120 FOR I=0 TO 999:NEXT I
130 GOTO 10